(rmail-start-mail): Don't do other frame unless we have

a window system, irregardless of the state of rmail-mail-new-frame.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index e73a6855b3e5c6db6e878b671aab4f3b1e181c7d..69e4b39e45d5812c5236045465eb2a3186f3546b 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1676,7 +1676,7 @@ Deleted messages stay in the file until the \\[rmail-expunge] command is given."
 ;;;; *** Rmail Mailing Commands ***
 
 (defun rmail-start-mail (&rest args)
-  (if rmail-mail-new-frame
+  (if (and window-system rmail-mail-new-frame)
       (prog1
        (apply 'mail-other-frame args)
        (modify-frame-parameters (selected-frame)